From: Richard M. Stallman Date: Wed, 26 May 1993 23:19:07 +0000 (+0000) Subject: (find-file-noselect): Expand buffer-file-truename X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~95909 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=27d0420cd5d05dd8a0017463f1624fe1e573c7a2;p=emacs.git (find-file-noselect): Expand buffer-file-truename before copying it to anything else. --- diff --git a/lisp/files.el b/lisp/files.el index 30f04dfd2ee..a9430029d56 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -608,7 +608,9 @@ The buffer is not selected, just returned to the caller." (not (member logical find-file-not-true-dirname-list))) (setq buffer-file-name buffer-file-truename)) (if find-file-visit-truename - (setq buffer-file-name (setq filename buffer-file-truename))) + (setq buffer-file-name + (setq filename + (expand-file-name buffer-file-truename)))) ;; Set buffer's default directory to that of the file. (setq default-directory (file-name-directory filename)) ;; Turn off backup files for certain file names. Since